home *** CD-ROM | disk | FTP | other *** search
/ FishMarket 1.0 / FishMarket v1.0.iso / fishies / 301-325 / disk_319 / cnewssrc / cnews.orig.lzh / relay / aux / chamod < prev    next >
Text File  |  1989-06-27  |  993b  |  43 lines
  1. #!/bin/sh
  2. # chamod ng flag - change the "moderated" flag for ng to flag
  3.  
  4. # =()<. ${NEWSCONFIG-@<NEWSCONFIG>@}>()=
  5. . ${NEWSCONFIG-/usr/lib/news/bin/config}
  6. export NEWSCTL NEWSBIN NEWSARTS
  7. PATH=$NEWSCTL/bin:$NEWSBIN:$NEWSPATH ; export PATH
  8. umask $NEWSUMASK
  9.  
  10. case "$1" in
  11. "")
  12.     echo "$0: null newsgroup not permitted" >&2
  13.     exit 1
  14.     ;;
  15. esac
  16. case "$2" in
  17. moderated)    flag=m ;;
  18. *)        flag=y ;;
  19. esac
  20.  
  21. aflag=`awk "/$1/"' { print $4 }' $NEWSCTL/active`
  22. if test "$aflag" != "$flag" -a \( "$aflag" = m -o "$aflag" = y \); then
  23.     # old & new flags differ & old flag is m or y
  24.     # watch closely - shell quoting is tricky here
  25.     awk '
  26. $1 == "'$1'"    {            # this line is for first arg.
  27.     print $1, $2, $3, "'$flag'"
  28.     next
  29. }
  30.     { print }
  31. ' $NEWSCTL/active >$NEWSCTL/active.new
  32.     cp $NEWSCTL/active $NEWSCTL/active.old
  33.     cp $NEWSCTL/active.new $NEWSCTL/active
  34.     rm -f $NEWSCTL/active.new
  35.  
  36.     case "$flag" in
  37.     m)    pfx="" ;;
  38.     *)    pfx=un ;;
  39.     esac
  40.     echo "newsgroup $1 was changed to ${pfx}moderated by $SENDER" |
  41.         mail $NEWSMASTER
  42. fi
  43.